home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1998 July / Software of the Month Club 1998 July.iso / mac / Education / PredDemo / PredDemo1.0 / PredDemo1.3 final / 00019_fcgEnd1.ls < prev    next >
Encoding:
Text File  |  1998-05-06  |  372 b   |  15 lines
  1. on exitFrame
  2.   global rightCount, wrongCount
  3.   noPuppets()
  4.   if rightCount >= 3 then
  5.     soundOff(2, 2)
  6.     sound stop 2
  7.     puppetPalette("fcQ1pal")
  8.     puppetTransition(51)
  9.     go("anim")
  10.   else
  11.     put "Sorry you didnt win." into field "FCmsg"
  12.     put "Your SCORE:" & RETURN & rightCount & " Right" & RETURN & wrongCount & " Wrong" into field "fcScoreWin"
  13.   end if
  14. end
  15.